inherited frmAplicacao: TfrmAplicacao
  Left = 378
  Top = 194
  Width = 548
  Height = 478
  AutoScroll = True
  Caption = ''
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 407
    Width = 540
  end
  inherited Panel2: TPanel
    Width = 540
    Height = 407
    inherited Panel3: TPanel
      Width = 538
      Caption = 'Aplica'#231#245'es'
      inherited GroupBox1: TGroupBox
        Left = 459
      end
    end
    inherited Panel4: TPanel
      Width = 538
      Height = 365
      object Label2: TLabel [0]
        Left = 10
        Top = 45
        Width = 52
        Height = 13
        Caption = 'Aplica'#231#245'es'
      end
      object Label3: TLabel [1]
        Left = 10
        Top = 5
        Width = 33
        Height = 13
        Caption = 'Codigo'
      end
      inherited DBGrid1: TDBGrid
        Top = 167
        Width = 530
        TabOrder = 5
      end
      inherited SbHints: TStatusBar
        Top = 148
        Width = 530
        Color = clBtnFace
      end
      object MAplicacoes: TDBMemo
        Left = 10
        Top = 59
        Width = 519
        Height = 78
        Hint = 
          'Aplica'#231#227'o do porduto(Ex: Onde, ou em que, o produto pode ser apl' +
          'icado)'
        Ctl3D = True
        DataField = 'APL_APLICA'
        DataSource = DtSrc
        Enabled = False
        ParentCtl3D = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnKeyPress = MAplicacoesKeyPress
      end
      object BtnAplicacao: TBitBtn
        Left = 131
        Top = 18
        Width = 21
        Height = 21
        Caption = '...'
        Enabled = False
        TabOrder = 0
        OnClick = BtnAplicacaoClick
      end
      object EdtAplNome: TEdit
        Left = 152
        Top = 18
        Width = 376
        Height = 21
        Hint = 'Descri'#231#227'o do produto!'
        Color = clBtnFace
        Ctl3D = True
        Enabled = False
        ParentCtl3D = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object EdtCodigo: TEdit
        Left = 8
        Top = 18
        Width = 121
        Height = 21
        TabOrder = 4
        OnExit = EdtCodigoExit
      end
    end
  end
  inherited DtSrc: TDataSource
    DataSet = SQLC_Aplicacoes
    Left = 40
    Top = 0
  end
  inherited DtSrcDBGrid: TDataSource
    Left = 376
    Top = 96
  end
  object SQLC_Aplicacoes: TSQLClientDataSet
    CommandText = 'select * from APLICACOES where apl_idfcod=:pcodigo;'#13#10
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftString
        Name = 'pcodigo'
        ParamType = ptInput
      end>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 121
    object SQLC_AplicacoesAPL_IDFCOD: TIntegerField
      FieldName = 'APL_IDFCOD'
      Required = True
    end
    object SQLC_AplicacoesAPL_APLICA: TMemoField
      FieldName = 'APL_APLICA'
      BlobType = ftMemo
      Size = 1
    end
  end
end
